home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / delphi2 / delphite.exe / data.z / DSGNWNDS.INT < prev    next >
Encoding:
Text File  |  1996-08-12  |  1.5 KB  |  41 lines
  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Delphi Visual Component Library                 }
  5. {                                                       }
  6. {       Copyright (c) 1995,96 Borland International     }
  7. {                                                       }
  8. {*******************************************************}
  9.  
  10. unit DsgnWnds;
  11.  
  12. interface
  13.  
  14. uses Messages, SysUtils, Classes, Controls, Forms, LibIntf, DsgnIntf;
  15.  
  16. type
  17.   TDesignWindow = class(TForm)
  18.   protected
  19.     procedure Activated; dynamic;
  20.     procedure ActivateInspector(Ch: Char);
  21.     function ClipboardComponents: Boolean;
  22.     procedure CopyComponents(Root: TComponent; Components: TComponentList);
  23.     procedure PasteComponents(AOwner, AParent: TComponent;
  24.       Components: TComponentList);
  25.     procedure SetSelection(Components: TComponentList);
  26.     function UniqueName(Component: TComponent): string; virtual; abstract;
  27.   public
  28.     constructor Create(AOwner: TComponent); override;
  29.     destructor Destroy; override;
  30.     procedure ComponentDeleted(Component: TComponent); virtual;
  31.     function GetEditState: TEditState; virtual;
  32.     procedure EditAction(Action: TEditAction); virtual;
  33.     procedure FormClosed(AForm: TForm); virtual;
  34.     procedure FormModified; virtual;
  35.     procedure SelectionChanged(ASelection: TComponentList); virtual;
  36.     property Active: Boolean;
  37.     property Designer: TFormDesigner;
  38.   end;
  39.  
  40. implementation
  41.